﻿
Public Class PLSQLErrorInfo
    Public Property RETCD As Integer                '戻り値定数
    Public Property O_VC_ERR_FIELD_NM As String     'エラーフィールド名
    Public Property O_VC_ERR_MSGCD As String        'エラーメッセージコード
    Public Property O_VC_ERR_MSGPARAMS As String    'エラーパラメータ（区切り：TAB）
    Public Property O_VC_MESSAGE As String          'エラーメッセージ

    Public Sub Clear()
        RETCD = 0
        O_VC_ERR_FIELD_NM = String.Empty
        O_VC_ERR_MSGCD = String.Empty
        O_VC_ERR_MSGPARAMS = String.Empty
        O_VC_MESSAGE = String.Empty
    End Sub
End Class
